@echo off


rd /s /q result
if not exist result md result
if exist result\TP.exe del result\TP.exe
C:\openCOBOL\bin\cobc.exe -x ..\..\Principal.cbl -o result\TP.exe
if not exist result\TP.exe goto :end
copy ASIGNACIONES1.DAT result\
copy ASIGNACIONES2.DAT result\
copy ASIGNACIONES3.DAT result\
copy SOLICITUDES.DAT result\
copy CLIENTES.DAT result\
copy VALORES.DAT result\
cd result\
cls
TP.exe
:end

echo.
pause